home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Toolbox / Visual Basic Toolbox (P.I.E.)(1996).ISO / referenc / ctl3dv / ctl3dv.txt
Text File  |  1994-12-26  |  1KB  |  26 lines
  1. Using ctl3dv2.dll
  2.  
  3. I found the following information on using ctl3dv2.dll while browsing 
  4. through a help file for Borland C++ 4.0.  This appears to work VERY 
  5. WELL with few problems. The steps are as follows:
  6.  
  7.   1. Add the following to your global delcarations:
  8.     Declare Function GetModuleHandle Lib "Kernel" (ByVal ModuleName As String) As Integer
  9.     Declare Function Ctl3dAutoSubclass Lib "Ctl3DV2.DLL" (ByVal hInst As Integer) As Integer
  10.     Declare Function Ctl3dRegister Lib "Ctl3DV2.DLL" (ByVal hInst As Integer) As Integer
  11.     Declare Function Ctl3dUnregister Lib "Ctl3DV2.DLL" (ByVal hInst As Integer) As Integer
  12.  
  13.   2. Add the following to your main form LOAD event:
  14.     Inst% = GetModuleHandle("Your app name here")
  15.     ret = Ctl3dRegister(Inst%)
  16.     ret = Ctl3dAutoSubclass(Inst%)
  17.  
  18.   3. Add the following to your main form UNLOAD event:
  19.     Inst% = GetModuleHandle("test.exe")
  20.     ret = Ctl3dUnregister(Inst%)
  21.  
  22.   4. Make sure that ctl3dv2.dll is in your \windows\system directory
  23.  
  24. This only works on the common dialog and message boxes, not on VB forms.  If
  25. you have the professional version of VB you already have the .dll file and are
  26. free to distribute it with your programs.